home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1998 April: Mac OS SDK / Dev.CD Apr 98 SDK1.toast / Development Kits (Disc 1) / Interfaces&Libraries / Universal / Interfaces / PInterfaces / CMCalibrator.p < prev    next >
Encoding:
Text File  |  1998-02-12  |  3.0 KB  |  128 lines  |  [TEXT/MPS ]
  1. {
  2.      File:        CMCalibrator.p
  3.  
  4.      Contains:    ColorSync Calibration API
  5.  
  6.      Version:    Technology:    ColorSync 2.5
  7.                  Release:    Universal Interfaces 3.1
  8.  
  9.      Copyright:    © 1998 by Apple Computer, Inc., all rights reserved.
  10.  
  11.      Bugs?:        Please include the the file and version information (from above) with
  12.                  the problem description.  Developers belonging to one of the Apple
  13.                  developer programs can submit bug reports to:
  14.  
  15.                      devsupport@apple.com
  16.  
  17. }
  18. {$IFC UNDEFINED UsingIncludes}
  19. {$SETC UsingIncludes := 0}
  20. {$ENDC}
  21.  
  22. {$IFC NOT UsingIncludes}
  23.  UNIT CMCalibrator;
  24.  INTERFACE
  25. {$ENDC}
  26.  
  27. {$IFC UNDEFINED __CMCALIBRATOR__}
  28. {$SETC __CMCALIBRATOR__ := 1}
  29.  
  30. {$I+}
  31. {$SETC CMCalibratorIncludes := UsingIncludes}
  32. {$SETC UsingIncludes := 1}
  33.  
  34. {$IFC UNDEFINED __CMAPPLICATION__}
  35. {$I CMApplication.p}
  36. {$ENDC}
  37. {$IFC UNDEFINED __DISPLAYS__}
  38. {$I Displays.p}
  39. {$ENDC}
  40. {$IFC UNDEFINED __ERRORS__}
  41. {$I Errors.p}
  42. {$ENDC}
  43.  
  44.  
  45. {$PUSH}
  46. {$ALIGN MAC68K}
  47. {$LibExport+}
  48.  
  49.  
  50. TYPE
  51. {$IFC TYPED_FUNCTION_POINTERS}
  52.     CalibrateEventProcPtr = PROCEDURE(VAR event: EventRecord);
  53. {$ELSEC}
  54.     CalibrateEventProcPtr = ProcPtr;
  55. {$ENDC}
  56.  
  57.     CalibrateEventUPP = UniversalProcPtr;
  58.     CalibratorInfoPtr = ^CalibratorInfo;
  59.     CalibratorInfo = RECORD
  60.         displayID:                AVIDType;
  61.         profileLocation:        CMProfileLocation;
  62.         eventProc:                CalibrateEventUPP;
  63.         reserved:                UInt32;
  64.         flags:                    UInt32;
  65.         isGood:                    BOOLEAN;
  66.         byteFiller:                SInt8;
  67.     END;
  68.  
  69. {$IFC TYPED_FUNCTION_POINTERS}
  70.     CanCalibrateProcPtr = FUNCTION(displayID: AVIDType): BOOLEAN;
  71. {$ELSEC}
  72.     CanCalibrateProcPtr = ProcPtr;
  73. {$ENDC}
  74.  
  75. {$IFC TYPED_FUNCTION_POINTERS}
  76.     CalibrateProcPtr = FUNCTION(VAR theInfo: CalibratorInfo): OSErr;
  77. {$ELSEC}
  78.     CalibrateProcPtr = ProcPtr;
  79. {$ENDC}
  80.  
  81.     CanCalibrateUPP = UniversalProcPtr;
  82.     CalibrateUPP = UniversalProcPtr;
  83.  
  84. CONST
  85.     uppCalibrateEventProcInfo = $000000C0;
  86.     uppCanCalibrateProcInfo = $000000D0;
  87.     uppCalibrateProcInfo = $000000E0;
  88.  
  89. FUNCTION NewCalibrateEventProc(userRoutine: CalibrateEventProcPtr): CalibrateEventUPP;
  90.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  91.     INLINE $2E9F;
  92.     {$ENDC}
  93.  
  94. FUNCTION NewCanCalibrateProc(userRoutine: CanCalibrateProcPtr): CanCalibrateUPP;
  95.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  96.     INLINE $2E9F;
  97.     {$ENDC}
  98.  
  99. FUNCTION NewCalibrateProc(userRoutine: CalibrateProcPtr): CalibrateUPP;
  100.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  101.     INLINE $2E9F;
  102.     {$ENDC}
  103.  
  104. PROCEDURE CallCalibrateEventProc(VAR event: EventRecord; userRoutine: CalibrateEventUPP);
  105.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  106.     INLINE $205F, $4E90;
  107.     {$ENDC}
  108.  
  109. FUNCTION CallCanCalibrateProc(displayID: AVIDType; userRoutine: CanCalibrateUPP): BOOLEAN;
  110.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  111.     INLINE $205F, $4E90;
  112.     {$ENDC}
  113.  
  114. FUNCTION CallCalibrateProc(VAR theInfo: CalibratorInfo; userRoutine: CalibrateUPP): OSErr;
  115.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  116.     INLINE $205F, $4E90;
  117.     {$ENDC}
  118. {$ALIGN RESET}
  119. {$POP}
  120.  
  121. {$SETC UsingIncludes := CMCalibratorIncludes}
  122.  
  123. {$ENDC} {__CMCALIBRATOR__}
  124.  
  125. {$IFC NOT UsingIncludes}
  126.  END.
  127. {$ENDC}
  128.